10 REM AHL'S SIMPLE BENCHMARK
20 TS=TI: POKE53265,11: REM BLANK SCREEN
30 R=0:S=0
40 FOR N=1 TO 100: A=N
50 FOR I=1 TO 10
60 A=SQR(A): R=R+RND(1)
70 NEXT I
80 FOR I=1 TO 10
90 A=A^2: R=R+RND(1)
100 NEXT I
110 S=S+A: NEXT N
120 POKE53265,27: REM TURN SCREEN ON
130 PRINT" ACCURACY  ",ABS(1010-S/5)
140 PRINT" RANDOM    ",ABS(1000-R)
150 PRINT"TIME IN SEC",INT((TI-TS)*(100/60))/100
160 END